home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue33 / random / Chitable.inc next >
Encoding:
Text File  |  1998-03-18  |  2.7 KB  |  51 lines
  1. {==========================================
  2.  These tables were generated from routines
  3.  in 'Numerical Recipes in Pascal'.
  4.  ==========================================}
  5.  
  6. const
  7.   ChiTable5 : array [1..100] of double = (
  8.         0.00393,   0.10260,   0.35184,   0.71069,   1.14548,
  9.         1.63550,   2.16742,   2.73267,   3.32501,   3.94043,
  10.         4.57483,   5.22583,   5.89182,   6.57062,   7.26105,
  11.         7.96191,   8.67172,   9.39056,  10.11694,  10.85083,
  12.        11.59140,  12.33807,  13.09052,  13.84863,  14.61182,
  13.        15.37878,  16.15155,  16.92749,  17.70816,  18.49274,
  14.        19.28040,  20.07227,  20.86670,  21.66400,  22.46460,
  15.        23.26904,  24.07462,  24.88416,  25.69492,  26.50879,
  16.        27.32541,  28.14441,  28.96411,  29.78809,  30.61203,
  17.        31.43970,  32.26804,  33.09814,  33.92975,  34.76410,
  18.        35.59946,  36.43713,  37.27533,  38.11624,  38.95805,
  19.        39.80054,  40.64520,  41.49191,  42.33963,  43.18726,
  20.        44.03735,  44.88983,  45.74075,  46.59570,  47.44873,
  21.        48.30560,  49.16223,  50.02051,  50.87929,  51.73950,
  22.        52.59998,  53.46167,  54.32449,  55.18835,  56.05316,
  23.        56.91998,  57.78642,  58.65472,  59.52243,  60.39063,
  24.        61.26169,  62.13312,  63.00482,  63.87671,  64.74869,
  25.        65.62329,  66.49786,  67.37231,  68.24927,  69.12598,
  26.        70.00374,  70.88110,  71.75940,  72.64001,  73.52005,
  27.        74.39941,  75.28098,  76.16473,  77.04616,  77.92969);
  28.  
  29.   ChiTable95 : array [1..100] of double = (
  30.         3.84155,   5.99121,   7.81494,   9.48730,  11.07025,
  31.        12.59125,  14.06708,  15.50781,  16.91895,  18.30750,
  32.        19.67499,  21.02600,  22.36160,  23.68439,  24.99619,
  33.        26.29639,  27.58713,  28.86932,  30.14412,  31.41022,
  34.        32.66991,  33.92517,  35.17242,  36.41418,  37.65297,
  35.        38.88535,  40.11314,  41.33713,  42.55791,  43.77365,
  36.        44.98444,  46.19385,  47.40074,  48.60237,  49.80087,
  37.        50.99854,  52.19215,  53.38387,  54.57298,  55.75867,
  38.        56.94305,  58.12363,  59.30412,  60.48187,  61.65733,
  39.        62.82921,  64.00143,  65.17090,  66.33797,  67.50488,
  40.        68.66821,  69.83215,  70.99312,  72.15340,  73.31123,
  41.        74.46899,  75.62485,  76.77902,  77.93175,  79.08096,
  42.        80.23144,  81.38115,  82.52792,  83.67432,  84.82056,
  43.        85.96436,  87.10838,  88.25027,  89.39014,  90.53078,
  44.        91.66969,  92.80701,  93.94562,  95.08011,  96.21620,
  45.        97.35123,  98.48530,  99.61555, 100.74802, 101.87988,
  46.       103.00816, 104.13910, 105.26661, 106.39389, 107.52106,
  47.       108.64822, 109.77219, 110.89798, 112.02068, 113.14545,
  48.       114.26723, 115.38956, 116.51253, 117.63268, 118.75181,
  49.       119.87183, 120.99098, 122.10747, 123.22506, 124.34196);
  50. {==========================================}
  51.